www.gusucode.com > ASP 在线订购程序 > ASP 在线订购程序\code\order_submit.asp
<!--#include file="conn.asp"-->
<%
dim rstg
dim p_name1,p_phone1,p_address1,p_num1,payment1,p_qq1,memo1,thesql,d_ip
p_name1=request.form("p_name")
p_phone1=request.form("p_phone")
p_address1=request.form("p_address")
p_num1=request.form("p_num")
payment1=request.form("payment")
p_qq1=request.form("p_qq")
memo1=request.form("memo")
d_ip=Request.ServerVariables("REMOTE_HOST")
set rstg=server.createobject("adodb.recordset")
thesql = "select * from order111 where id is null"
rstg.open thesql ,conn,1,3
rstg.addnew
rstg("shouhuoren")=p_name1
rstg("tel")=p_phone1
rstg("addr")=p_address1
rstg("dingguo")=p_num1
rstg("fukuan")=payment1
rstg("QQ")=p_qq1
rstg("shouhuorenip")=d_ip
rstg("contents")=memo1
rstg("shouhuorentime")=date() + time()
rstg.update
rstg.close
set rstg=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<title>订购成功</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css/style.css">
</head>
<body leftmargin="5" topmargin="0" marginwidth="0" marginheight="5">
<table width="100%" border="0" cellpadding="5" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td bgcolor="#EAEAEA" class="title"><span style="bold;font-size: 15px;color: #666666;font-family: 黑体;">□
<strong>订购成功</strong> </span></td>
</tr>
</table>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tbody>
<tr>
<td width="545" height="20"> </td>
</tr>
<tr>
<td height="25" align="center"><strong>恭喜您：产品订购成功！</strong></td>
</tr>
<tr>
<td height="25" align="center"> </td>
</tr>
<tr>
<td height="25" align="center">[<a href="/">返回首页</a>]</td>
</tr>
<tr>
<td> </td>
</tr>
</tbody>
</table>
</body>
</html>